(widget-image-insert): Don't merge mouse-face with neighbouring buttons.

diff --git a/lisp/wid-edit.el b/lisp/wid-edit.el
index 6725144e68255fd076be01b4a9c1d9be19dadfdb..abb7fb6631e7180441823e2b4039716f5a6efb05 100644 (file)
--- a/lisp/wid-edit.el
+++ b/lisp/wid-edit.el
@@ -656,7 +656,9 @@ button is pressed or inactive, respectively.  These are currently ignored."
       (progn (widget-put widget :suppress-face t)
             (insert-image image
                           (propertize
-                           tag 'mouse-face widget-button-pressed-face)))
+                            ;; Use a `list' so it's unique and won't get
+                            ;; accidentally merged with neighbouring images.
+                           tag 'mouse-face (list widget-button-pressed-face))))
     (insert tag)))
 
 (defun widget-move-and-invoke (event)